OutText procedure

  DECLARATION:  OutText(TextString : String)

      PURPOSE:  Sends a string to the output device at the Current Pointer

         UNIT:  Graph

      REMARKS:  TextString will be output at the Current Pointer (CP) using
                the current settings in SetTextStyle and SetTextJustify.  If
                TextString is too long, it will be truncated at the viewport
                border.

                The Current Pointer (CP) is only updated if the direction is
                horizontal and the justification has been set to left.

 RESTRICTIONS:  Must first be in graphics mode.